home *** CD-ROM | disk | FTP | other *** search
/ Star Festival... a Return to Japan / Star Festival... a Return to Japan.iso / pc / STARFESTIVAL / 12p5.dir / 00001.ls next >
Encoding:
Text File  |  1999-04-27  |  1.9 KB  |  70 lines
  1. on startMovie
  2.   global gKnobSprite, gSendMovie, gCursorReady, gKnobState
  3.   puppetSprite(48, 1)
  4.   gCursorReady = 1
  5.   gKnobSprite = 14
  6.   gSendMovie = "12p5"
  7.   gKnobState = 1
  8.   puppetSprite(gKnobSprite, 1)
  9.   setUpKnob()
  10.   sprite(34).visible = 0
  11.   set the mouseDownScript to EMPTY
  12.   set the mouseUpScript to EMPTY
  13. end
  14.  
  15. on stopMovie
  16.   when timeOut then nothing
  17. end
  18.  
  19. on idle
  20.   global gCursorReady
  21.   if gCursorReady = 1 then
  22.     cursor(200)
  23.     checkCursors()
  24.     set the locH of sprite 48 to the mouseH
  25.     set the locV of sprite 48 to the mouseV
  26.     updateStage()
  27.   end if
  28. end
  29.  
  30. on checkCursors
  31.   global gMagCursor
  32.   gMagCursor = "magCursor"
  33.   set the castNum of sprite 48 to the number of member "curs1"
  34.   if the castNum of sprite 5 and rollOver(5) then
  35.     set the castNum of sprite 48 to the number of member gMagCursor
  36.   end if
  37.   if the castNum of sprite 6 and rollOver(6) then
  38.     set the castNum of sprite 48 to the number of member gMagCursor
  39.   end if
  40.   if the castNum of sprite 8 and rollOver(8) then
  41.     set the castNum of sprite 48 to the number of member "deMagCursor"
  42.   end if
  43.   repeat with i = 15 to 17
  44.     if rollOver(i) then
  45.       set the castNum of sprite 48 to the number of member "hotCursor"
  46.     end if
  47.   end repeat
  48.   repeat with i = 20 to 23
  49.     if the castNum of sprite i and rollOver(i) then
  50.       set the castNum of sprite 48 to the number of member "hotCursor"
  51.     end if
  52.   end repeat
  53.   repeat with i = 30 to 31
  54.     if rollOver(i) then
  55.       set the castNum of sprite 48 to the number of member "hotCursor"
  56.     end if
  57.   end repeat
  58.   if rollOver(34) and (sprite(34).visible = 1) then
  59.     set the castNum of sprite 48 to the number of member "hotCursor"
  60.   end if
  61.   repeat with i = 40 to 42
  62.     if rollOver(i) then
  63.       set the castNum of sprite 48 to the number of member "hotCursor"
  64.     end if
  65.   end repeat
  66.   if the castNum of sprite 47 and rollOver(47) then
  67.     set the castNum of sprite 48 to the number of member "hotCursor"
  68.   end if
  69. end
  70.